C# / VB.NET - [VB.NET] modificare testo e colori di una finestra a riga di comando

Forum - C# / VB.NET - [VB.NET] modificare testo e colori di una finestra a riga di comando

amreo (Normal User)
Pro

Messaggi: 93
Iscritto: 18/03/2013

Postato alle 22:10
Mercoledì, 29/01/2014

come faccio a modificare il testo dei programmi console, senza usare possibilmente clear?

tipo, sulla console c'è scritto

---------------------------------------------------------------------
progresso di completamento: 56% <++-------->
---------------------------------------------------------------------
voglio modificare quel 56% non so in 75%.

come faccio??

nessuno (Normal User)
Guru^2

Messaggi: 6405
Iscritto: 03/01/2010

Postato alle 22:19
Mercoledì, 29/01/2014

Se parliamo di Windows, allora

http://msdn.microsoft.com/en-us/library/windows/desktop/ms ...

ovviamente per avere un controllo completo, non solo per risolvere il piccolo problema che hai indicato.

Ultima modifica effettuata da nessuno il 29/01/2014 alle 22:20

Ricorda che nessuno è obbligato a risponderti e che nessuno è perfetto ...
---
Il grande studioso italiano Bruno de Finetti ( uno dei padri fondatori del moderno Calcolo delle probabilità ) chiamava il gioco del Lotto Tassa sulla stupidità.

Thejuster (Admin)
Guru^2

Messaggi: 2308
Iscritto: 04/05/2008

Postato alle 2:57
Giovedì, 30/01/2014

La lista che nessuno ti ha fornito equivale a tutte le funzioni disponibili nel campo richiesto per la funzione.

in pratica devi spostare il cursore _ nella posizione interessata
ovvero prima di <++------> e sostituire il char,

https://mire.forumfree.it/ - Mire Engine
C# UI Designer

amreo (Normal User)
Pro

Messaggi: 93
Iscritto: 18/03/2013

Postato alle 15:16
Giovedì, 30/01/2014

ho trovato la funzione ma non mi va, ho avuto alcuni problemi con handle e non so se la funzione è quella giusta. ho fatto la prova ma niente, scrive dopo la stringa.

Codice sorgente - presumibilmente VB.NET

Public Declare Function SetConsoleCursorPosition Lib "kernel32" Alias "SetConsoleCursorPosition" (ByVal hConsoleOutput As Integer, <MarshalAs(UnmanagedType.Struct)> ByRef dwCursorPosition As COORD) As Integer
 
    Public Declare Auto Function FindWindowByCaption Lib "user32.dll" Alias "FindWindow" (zeroOnly As IntPtr, lpWindowName As String) As IntPtr
 
    Sub Main()
        Dim rnd As New Random
        Console.Title = "test"
        Dim handle As IntPtr = FindWindowByCaption(IntPtr.Zero, Console.Title)
        Console.Write("cidsadsa dsa sad  10% das dsa sad ads dsa")
        SetConsoleCursorPosition(handle.ToInt64, New COORD(18, 0))
        MsgBox("")
        Console.Write("20%")
 
    End Sub
 
    Public Structure COORD
        Public x As Short
        Public y As Short
 
        Sub New(x As Integer, y As Integer)
            ' TODO: Complete member initialization 
            Me.x = x
            Me.y = y
        End Sub
 
    End Structure

Thejuster (Admin)
Guru^2

Messaggi: 2308
Iscritto: 04/05/2008

Postato alle 2:22
Venerdì, 31/01/2014

chiedo scusa ma il vb mi sta proprio antipatico.
ho provato a tirare su questo

Codice sorgente - presumibilmente C# / VB.NET

Console.WriteLine("Caricamento 10% su 100%")
 
        Console.ForegroundColor = ConsoleColor.Red
 
        Console.WriteLine("Di quanto aumentare?")
 
        Console.ForegroundColor = ConsoleColor.White
 
        Dim val As Integer = Console.ReadLine()
        Console.WriteLine()
 
        Console.WriteLine("Valore aumentato a " & val)
 
        Console.ReadKey()
 
        Console.SetCursorPosition(12, 0)
        Console.Write("" + val.ToString + " su 100% ")
 
        Console.ReadKey()

https://mire.forumfree.it/ - Mire Engine
C# UI Designer

amreo (Normal User)
Pro

Messaggi: 93
Iscritto: 18/03/2013

Postato alle 16:09
Venerdì, 31/01/2014

funziona!